home *** CD-ROM | disk | FTP | other *** search
- on exitFrame
- global startticks, sndname
- go(the frame)
- if not soundBusy(1) then
- sound playFile 1, sndname
- end if
- if (the ticks - startticks) >= (60 * 0.5) then
- repeat with i = 6 to 13
- set cname1 to item 1 of the name of cast the castNum of sprite i
- set cname2 to value(item 2 of the name of cast the castNum of sprite i)
- if cname2 = 2 then
- set cname2 to 1
- else
- set cname2 to cname2 + 1
- end if
- set the castNum of sprite i to the number of cast (cname1 & "," & cname2)
- end repeat
- set startticks to the ticks
- end if
- end
-